home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 22 / CU Amiga Magazine's Super CD-ROM 22 (1998)(EMAP Images)(GB)[!][issue 1998-05].iso / PowerPC / Programming / PPCSmallEiffel / bin_c / pretty35.c < prev    next >
Encoding:
C/C++ Source or Header  |  1998-01-16  |  2.6 KB  |  98 lines
  1. /*
  2. -- ANSI C code generated by :
  3. -- SmallEiffel The GNU Eiffel Compiler -- Release (- 0.82)      --
  4. -- Copyright (C), 1994-98 - LORIA - UHP - CRIN - INRIA - FRANCE --
  5. -- Dominique COLNET and Suzanne COLLIN -    colnet@loria.fr     --
  6. --                 http://www.loria.fr/SmallEiffel              --
  7. */
  8. #include "pretty.h"
  9. void X173pretty_print(void *C){
  10. int id=((T0*)C)->id;
  11. if (id <= 317) {
  12. if (id <= 268) {
  13. r268pretty_print(((T268*)C));
  14. } else {
  15. r317pretty_print(((T317*)C));
  16. }} else {
  17. r568pretty_print(((T568*)C));
  18. }}
  19. int X173arg_count(void *C){
  20. int id=((T0*)C)->id;
  21. if (id <= 317) {
  22. if (id <= 268) {
  23. return((int)(0));
  24. } else {
  25. return((int)(1));
  26. }} else {
  27. return((int)(/*(IRF4.6arg_count*/r431count(((T431*)((((T568*)((T568*)C)))->_arguments/*20*/)))/*)*/));
  28. }}
  29. T0* X173make_runnable(void *C,T0* a1,T0* a2,T0* a3,T0* a4){
  30. int id=((T0*)C)->id;
  31. if (id <= 317) {
  32. if (id <= 268) {
  33. return((T0*)(r268make_runnable(((T268*)C),a1,a2,a3,a4)));
  34. } else {
  35. return((T0*)(r317make_runnable(((T317*)C),a1,a2,a3,a4)));
  36. }} else {
  37. return((T0*)(r568make_runnable(((T568*)C),a1,a2,a3,a4)));
  38. }}
  39. void X355set_rescue_compound(void *C,T0* a1){
  40. int id=((T0*)C)->id;
  41. if (id <= 679) {
  42. if (id <= 297) {
  43. if (id <= 134) {
  44. r134set_rescue_compound(((T134*)C),a1);
  45. } else {
  46. r297set_rescue_compound(((T297*)C),a1);
  47. }} else {
  48. if (id <= 649) {
  49. r649set_rescue_compound(((T649*)C),a1);
  50. } else {
  51. r679set_rescue_compound(((T679*)C),a1);
  52. }}} else {
  53. if (id <= 844) {
  54. if (id <= 696) {
  55. r696set_rescue_compound(((T696*)C),a1);
  56. } else {
  57. r844set_rescue_compound(((T844*)C),a1);
  58. }} else {
  59. if (id <= 853) {
  60. r853set_rescue_compound(((T853*)C),a1);
  61. } else {
  62. r883set_rescue_compound(((T883*)C),a1);
  63. }}}}
  64. void X355set_ensure_assertion(void *C,T0* a1){
  65. int id=((T0*)C)->id;
  66. if (id <= 679) {
  67. if (id <= 297) {
  68. if (id <= 134) {
  69. /*[IRF3.3set_ensure_assertion*/((((T134*)(((T134*)C))))->_ensure_assertion)=(a1);
  70. /*]*/
  71. } else {
  72. /*[IRF3.3set_ensure_assertion*/((((T297*)(((T297*)C))))->_ensure_assertion)=(a1);
  73. /*]*/
  74. }} else {
  75. if (id <= 649) {
  76. /*[IRF3.3set_ensure_assertion*/((((T649*)(((T649*)C))))->_ensure_assertion)=(a1);
  77. /*]*/
  78. } else {
  79. /*[IRF3.3set_ensure_assertion*/((((T679*)(((T679*)C))))->_ensure_assertion)=(a1);
  80. /*]*/
  81. }}} else {
  82. if (id <= 844) {
  83. if (id <= 696) {
  84. /*[IRF3.3set_ensure_assertion*/((((T696*)(((T696*)C))))->_ensure_assertion)=(a1);
  85. /*]*/
  86. } else {
  87. /*[IRF3.3set_ensure_assertion*/((((T844*)(((T844*)C))))->_ensure_assertion)=(a1);
  88. /*]*/
  89. }} else {
  90. if (id <= 853) {
  91. /*[IRF3.3set_ensure_assertion*/((((T853*)(((T853*)C))))->_ensure_assertion)=(a1);
  92. /*]*/
  93. } else {
  94. /*[IRF3.3set_ensure_assertion*/((((T883*)(((T883*)C))))->_ensure_assertion)=(a1);
  95. /*]*/
  96. }}}}
  97.  
  98.